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A IS TRACT 


The  CAMA  iiit.orprot.cr  allows  subroutines  to  be  dynam¬ 
ically  loaded  and  executed,  and  data  to  be  entered  into 
the  CAMA  data  structure.  It  also  allows  modes  of  data 
types  and  sizes  of  data  regions  to  be  specified  easily. 
And,  in  addition,  it  allows  the  user  to  perform  tasks 
immediately  the  necessity  for  which  he  may  not  have  anti¬ 
cipated.  Through  its  connection  with  the  macro  processor 
the  interpreter  also  allows  a  convenient  and  dynamically 
expandable  command  languages  for  use  in  CAMA. 
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PREFACE 


Since  this  report  was  written,  we  have  implemented  a 
more  advanced  version  of  the  interpreter,  superseding  the 
one  described  here.  The  new  version  has  a  number  of  addi¬ 
tional  features  and  some  changes  in  syntax.  The  principal 
features  are: 

1.  The  new  version  is  reentrant. 

2.  Instead  of  being  limited  to  four  modes,  an 
indefinite  mode— defining  and  "supplementing 
capability  has  been  added. 

3.  A  component  structure  feature  ha a  ooen  added 
which  allows  structures  up  to  a  depth  of  five 
to  be  referenced. 

4.  Increased  default  capabilities  which  make  it 
easier  to  specify  defaults  have  been  included. 

5.  A  feature  has  been  added  which  allows  the  user 
to  specify  easily  his  own  subscripting  algorithm 
at  each  of  the  five  component  levels  for  up  to 
four  subscripts  per  level. 
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INTRODUCTION 


1  . 

To  enhance  the  capabilities  of  the  CAMA  (Computer- 
aided  Mathematical  Analysis)  system,1-3  we  have  written 
a  primitive  interpreter.  In  conjunction  with  a  parser 
and  the  macro  processor,4  it  permits  the  creation  of 
flexible  and  powerful  interpretive  languages.  Also, 
the  interpreter  and  macro  processor  together  form  the 
command  language  for  CAMA. 

Th-  interpreter  can  do  two  things:  it  can  call  sub¬ 
routines,  and  it  can  enter  data  into  the  data  structure. 
Both  capabilities  require  little  more  than  argument- 
management  routines.  Hence,  the  majority  of  code  in 
the  interpreter  is  concerned  with  arguments,  both  con¬ 
stants  and  variables.  To  call  a  subroutine,  its  name 
and  arguments  are  given.  The  arguments  are  collected 
into  a  parameter  list,  and  the  subroutine  is  dynamically 
loaded  and  executed. 

One  of  the  principal  uses  of  the  interpreter  is  to 
augment  compiled  programs.  When  a  compiled  program  is 
coded,  it  is  not  always  possible  to  anticipate  all  the 
results  that  need  to  be  printed  or  displayed.  Further¬ 
more,  some  calculations  can  be  performed  only  after  a 
preliminary  examination  of  the  results  of  the  run.  When 
the  CAMA  data  structure  is  in  use,  the  interpreter  can 
perform  side  calculations,  and  display  curves  and  inter¬ 
mediate  printed  data. 
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Data  entry  merely  involves  the  movement  of  data  be¬ 
tween  arguments. 

The  interpreter  handles  several  types  of  constants, 
including  integers  and  floating  point  numbers,  character- 
strings  and  hexadecimal  data.  Processing  of  constants 
consists  merely  of  conversion  to  internal  form. 

Variables  are  divided  into  two  classifications  ac¬ 
cording  to  their  lifespan.  Temporary  variables  are  ex¬ 
pected  to  be  used  for  a  very  short  time,  at  the  most  for 
the  duration  of  a  single  CAMA  run.  Permanent  variables, 
on  the  other  hand,  can  be  saved  and  restored  across  runs, 
along  with  the  rest  of  the  structure. 

Variables  are  also  classified  according  to  data  type. 
Presently  the  available  types  are  arithmetic  (scalar) , 
matrix ,  polynomial,  and  character  string. 

In  short,  through  its  ability  to  call  subroutines 
and  manipulate  arguments,  this  program  provides  the  most 
basic  capabilities  of  an  interpreter.  When  augmented 
with  the  macro  processor  and  a  parser,  we  arrive  at  a 
useful  and  easily  modifiable  full-scale  interpreter. 


2.  GLOSSARY 


Interpreter 

An  interpreter  is  a  program  which  accepts  statements 
in  a  given  language,  and  immediately  performs,  statement- 
by-statement,  the  actions  requested  by  those  statements. 
This  is  in  contrast  to  a  compiler,  which  translates  the 
statements  of  a  language  as  a  whole  program  into  an  inter¬ 
mediate  form  for  execution  at  a  later  time.  Interpreters 
are  most  often  used  in  an  interactive  mode  with  a  time¬ 
sharing  system. 

Argument 

In  the  CAMA  interpreter,  an  argument  is  simply  a 
value.  This  value  can  be  a  constant,  either  integer 
or  floating-point  numeric,  a  character  string,  or  hexa¬ 
decimal  data;  or  it  can  be  a  variable.  A  variable  can 
be  either  a  scalar  quantity,  a  matrix,  a  polynomial,  or 
a  character  string. 

Leading  Argument 

If  a  subprogram  call  statement  begins  with  a  scalar 
variable  followed  by  an  equal  sign,  the  subroutine  is 
assumed  to  be  a  function  type,  and  the  value  returned 
is  stored  in  the  scalar  variable.  This  variable  is 
called  a  leading  argument. 
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Temporary  Variable 

A  temporary  variable  is  a  CAMA  variable  which  is 
not  retained  for  a  long  period  of  time.  Usually,  inter¬ 
mediate  results  of  calculations  will  be  stored  in  tem¬ 
porary  variables. 

Any  time  an  'END'  statement  is  passed  to  the  inter¬ 
preter,  all  temporary  variables  are  destroyed.  No  tem¬ 
porary  variables  are  saved  past  the  end  of  a  CAMA  run. 

Permanent  Variable 

A  permanent  variable  is  a  CAMA  variable  which  con¬ 
tains  information  that  will  be  needed  for  a  relatively 
long  period  of  time.  Permanent  variables  can  be  saved 
and  restored  across  CAMA  runs. 

Mode 

A  mode  is  a  descriptor  of  a  CAMA  variable  data  type. 
Allowable  modes  at  present  are  arithmetic  (scalar) ,  matrix, 
polynomial,  and  character. 

Attribute 

An  attribute  gives  information  about  an  argument 
^hich  is  not  otherwise  apparent.  An  attribute  may  spec.i 
fy  such  things  as  mode,  problem,  permanent  or  temporary 
variable,  real  or  integer,  etc. 

Problem 

A  problem  is  a  grouping  of  related  permanent  CAMA 


variables . 
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Operation  of  the  Interpreter 

There  are,  at  present,  four  modes  in  the  CAMA  inter¬ 
preter.  They  are 

A  arithmetic  or  scalar  mode, 

M  matrix  mode, 

P  polynomial  mode, 

C  character  mode. 

The  data  and  operations  called  by  the  interpreter  vary 
depending  on  the  mode  of  variables. 

The  mode  of  all  temporary  variables  is  set  by  the 
user  at  the  beginning  of  a  run,  and  becomes  the  default 
mode  for  the  remainder  of  the  current  operation.  If  the 
user  wishes  to  process  the  variable  in  another  mode,  he 
can  do  so  by  changing  the  mode  attribute.  Permanent 
variables  have  their  mode  set  in  an  association  table 
connected  with  a  given  problem  name. 

Attributes  are  set  by  denoting  the  argument  variable 
or  constant  followed  by  an  "at"  sign  (@) ,  followed  by  one 
of  nine  sets  of  symbols  representing  the  attribute  being 
set.  These  are 


@x 

identifies  the 

as  hexadecimal 

variable 

being 

set 

@R& 

identifies  the 

as  0-byte  real 

variable 

being 

set 

@R4 

identifies  the 

as  4-byte  real 

variable 

being 

set 

@12 


@14 


@M=mode 


@p=problem 


@S 


identifies  the  variable  being  set 
as  2-byte  integer 

identifies  the  variable  being  set 
as  4-byte  integer 

changes  the  mode  of  a  variable  from 
default  mode  to  current  operating 
mode 

used  When  a  variable  is  used  from  a 
different  problem  from  the  current 
operating  problem 

denotes  the  variable  as  a  system  or 

temporary  variable. 

,  *  aets  the  dimension  of  a  polynomial 

@D= (m)  or  (m,n)  sets  tne 

or  an  array 

The  first  five  of  these  are  used  only  on  the  left- 
rtand  side  of  a  "function  type"  subprogram  call.  They 
allow  the  data  to  be  stored  according  to  the  proper  for- 

mat.  , 

variables  are  distinguished  by  an  alphabets  char¬ 
acter  in  the  lead  position  followed  by  seven  or  less 

tory  of  characters,  with  the  exception  of  those  used 

delimiters. 

The  delimiters  are: 

y  (blank) 

@  (at  sign) 

(  (comma) 

.  (semicolon) 
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and  (  (left  parenthesis) 

Right  parenthesis  is  only  truncated  as  a  delimiter  if 
it  is  preceded  by  a  left  parenthesis. 

Numeric  constants  are  denoted  by  a  numeric  char¬ 
acter  as  they  are  in  FORTRAN,  with  the  following  slight 
modifications.  An  integer  without  any  modifying  attri¬ 
bute  is  considered  to  be  defaulted  to  a  four-byte  integer. 
A  floating-point  real  number  without  a  modifying  attribute 
is  defaulted  to  a  four-byte  real  number.  If  the  user 
wishes  to  treat  the  integers  as  two-byte  integers,  he 
must  attach  the  attribut.e  (312.  Similarly,  if  the  user 
wishes  to  store  a  real  constant  as  a  double-precision 
number,  he  must  attach  the  attribute  (3R8. 

Variables  may  be  subscripted  in  the  same  way  that 
they  are  subscripted  in  FORTRAN.  At  present,  this  is 
applicable  only  in  the  case  of  the  matrix  mode  or  poly¬ 
nomial  mode. 

The  operation  of  the  interpreter  is  started  by 
giving  the  symbols  (INTERP) .  The  next  line  gives  the 
mode,  problem,  and  problem-name,  each  enclosed  in  a 
separate  set  of  parentheses  to  be  used  as  defaults 
throughout  the  remainder  of  the.'  operations.  If  the 
problem  name  is  not  given,  the  problem  defaults  to  .SYSTEM, 
which  implies  that  only  temporary  variables  are  being 
used.  If  the  mode  is  not  given,  the  mode  is  defaulted 


to  arithmetic  mode. 
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An  interpreter  run  is  terminated  by  the  word  END 
enclosed  in  parentheses  (END) .  This  destroys  all  tem¬ 
porary  (default)  data. 

Data  are  entered  into  variables  by  means  of  the 
data  entry  statement,  which  consists  of  a  variable,  a 
double  equal-sign,  and  the  data.  The  data  may  be  a 
single  constant  value,  a  variable,  or  an  array.  All 
of  these  fields  are  delimited  by  a  single  blank,  a 
multiple  blank,  a  comma,  or  a  comma  with  or  without  as 
many  blanks  as  desired. 

Subroutine  calls  are  made  by  listing  the  subroutine 
name  and  the  arguments  in  the  proper  calling  sequence. 
Use  of  the  function  type  subprogram  is  similar;  however, 
the  variable  to  which  the  result  is  to  be  assigned  pre¬ 
cedes  the  name  of  the  subprogram,  with  a  single  equal- 
sign  between.  All  the  fields  are  delimited  by  blanks 
and  commas  as  in  the  data  assignment  statement. 
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3 .  EXAMPLES 

These  simple  examples  assume  that  the  following 
subroutines  exist  and  that  they  perform  the  appropriate 
operations  on  matrices: 

AD  adds  two  matrices, 

SB  subtracts  two  matrices, 

MM  multiplies  two  matrices, 

TR  forms  the  trace  of  a  matrix, 

SC  a  scalar  times  a  matrix. 

(INTERP) 

(MAT) (ROUGH) 

This  puts  the  user  in  the  CAMA  interpreter,  sets 
the  default  mode  to  matrix  mode,  and  sets  the  problem 
name  to  ROUGH.  It  implies  that  the  data  will  be  found 
in  the  data  structure  by  accessing  the  list  ROUGH.  The 
first  left  parenthesis  must  be  in  column  1.  If  the 
mode  is  not  specified,  the  interpreter  will  look  for  the 
mode  information  in  an  association  table  associated  with 
the  problem  name.  If  none  is  available,  error  comments 
will  be  issued.  When  the  problem  name  is  not  specified, 
the  interpreter  defaults  to  SYSTEM  or  temporary  as  the 
storage  for  the  problem.  If,  under  those  circumstances, 
the  variable  name  has  not  been  defined,  an  error  comment. 


is  issued. 


10 


MM  A  B  C 

Tnis  multiplies  the  matrix  A  times  the  matrix  it  ami 
stores  the  result  in  C.  Dimension  and  size  information 
are  assumed  to  be  already  stored  in  the  matrices.  It 
also  assumes  proper  data  in  A  and  B.  Note:  blank  de¬ 
limiters  must  be  present. 

Z  ==  4.3 

This  stores  the  real*4  number  4.3  into  Z  as  a  scalar 
quantity.  Note:  blank  delimiters  must  be  present. 
Double-equals  is  assignment. 

SC , Z ,A,D@S 

This  multiplies  the  scalar  Z  times  the  matrix  A  and 
stores  the  result  D  in  the  temporary  storage,  not  in  the 
storage  under  the  problem-name  ROUGH.  Note  that  commas 
can  replace  blanks  as  delimiters. 

A@D=(3,4)  ==  3. 5, 2. 3,0. 

This  sets  the  dimensions  of  A  to  a  3x4  matrix  and 
stores  the  succeeding  values  beginning  with  A (1,1)  by 
rows  according  to  the  CAMA  matrix  format.  Note  commas 
and  blanks  are  used  as  delimiters. 

V (3 , 2)  ==  V  ( 3 , 3) 

This  sets  the  matrix  element  V(3,2)  to  the  same 


value  as  ( 3 , 3 ) 
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AD  A  B  C;SB  C  Q  R; AD  R  X  Y 

This  adds  the  matrix  A  to  B  and  puts  result  in  C. 

Then  it  subtracts  Q  from  C  and  stores  result  in  R.  Then 
it  adds  X  to  R  and  stores  it  in  Y.  Note  the  use  of  a 
semicolon  to  delimit  more  than  one  statement  on  a  line. 

(POLY) 

This  changes  the  mode  to  polynomial  mode,  but  leaves 
the  problem  name  the  same,  ROUGH. 

(  ) (EASY) 

This  leaves  the  mode  the  same  but  changes  the  problem 

name. 

(MAT) (ROUGH) 

This  changes  both  the  mode  and  the  problem-name 
back  to  their  original  designations. 

R@M=P  ==  6. 4, 9. 1,-13. 6,1. 4E-01 

The  values  on  the  right-hand  side  of  the  assign¬ 
ment  statement  are  stored  and  treated  as  a  polynomial, 
not  as  a  matrix.  R  must  have  been  specified  as  a  poly¬ 
nomial  in  some  previous  run. 

GALOP @P=HARD  ==  6.17 

The  value  6.17  is  stored  in  GALOP (1,1)  in  problem 


HARD. 
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MM  A , GALLOP @P= HARD , M@S 

The  matrix  A  of  the  problem  ROUGH  is  multiplied 
by  GALLOP  of  the  problem  HARD.  The  result  is  stored 
in  the  temporary  data  structure  in  the  matrix  M. 

A*G@R4  =  TR  A 

The  trace  of  the  matrix  A  is  stored  in  the  variable 
A*G .  Note  the  *  is  not  an  arithmetic  operator  but  a 
character  in  the  variable  name. 

A1@P=J0E@M=A  ==,-l.E+4 

This  sets  the  real*4  number  in  problem  JOE#  whose 
mode  is  scalar,  to  the  value  10,000.  Note:  the  multiple 
blanks  and  comma  are  alternate  delimiters. 

BOY@R8  ==  1.763479189 

This  sets  the  double-precision  variable  BOY  to 
1.763479189. 

CAT@I2  ==  6 

CAT  is  set  to  the  two-byte  integer  value  6. 
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Example  1.  Storing  and  Printing  a  Polynomial 


(INT) (POLYNOMIAL) \  This  sets  the  default  mode  of 

temporary  variables  to  poly- 
TK  6530  nomial 

POLY  ==  4.0  3.0  2.0  1.0\  The  polynomial  'POLY'  in  tempor¬ 
ary  storage  is  created  and  given 

TK  6530  values 


LIMIT  0.0  1.0  0.1\  LIMITS  are  set  for  polynomial 

evaluation 

P  POLY  The  polynomial  is  evaluated 

POLY  POLY  POLY  POLY  POLY  POLY 


POLY  ( 

0) =  0. 4000000E 

01 

x= 

0.0 

VALUE=  0 . 4000000E 

01 

POLY  ( 

1)=  0 . 3000000E 

01 

x= 

0.100 

VALUE=  0.4320999E 

01 

POLY  ( 

2 ) =  0 . 2000000E 

01 

x= 

0.200 

VALUE=  0 . 4687999E 

01 

POLY  ( 

3) =  0 . 1000000E 

01 

x= 

0.300 

VALUE=  0 . 5106998E 

01 

x= 

0.400 

VALUE=  0.5583999E 

01 

x= 

0.500 

VALUE=  0 . 6124998E 

01 

x= 

0.600 

VALUE=  0. 6735997E 

01 

x= 

0.700 

VALUE=  0.7422997E 

01 

x= 

0.800 

VALUE=  0. 8191997E 

01 

x= 

0.900 

VALUE=  0.9048997E 

01 

x= 

1.000 

VALUE=  0. 9999994E 

01 

x= 

1.000 

VALUE=  0 . 1000000E 

02 

POLY  POLY  POLY  POLY  POLY  POLY 
TK  6530 


The  reverse  slash  (\)  is  generated  by  CAMA  as  an 
indication  that  the  line  has  been  received.  TK6530  is 
returned  by  CAMA  to  indicate  that  it  is  prepared  to  re¬ 


ceive  a  new  line. 


Example  2.  Use  of  Character-String  Mode 


(INT)  (CHARACTER)\ 

TK  6530 

STRING  ==  THIS  IS  A  CHARACTER  STRINGN 
TK  6530 

SPRINT  STRING  26012  0  0\ 

THIS  IS  A  CHARACTER  STRING 


Default  mode  is  set 
to  character 


Character  variable 
is  created  and  set 


Character  string 
used  as  argument 


TK  6530 
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Example  3.  Use  of  Function-Type  Subprograms  and  Hexa 
decimal  Constant 


(INT)  (ARITHMETIC)\ 
TK  6530 

MPTR9I4  =  MASPTR\ 
TK  6530 


default  mode  set  to  arithmetic 


master  directory  pointer  fetched 
and  stored  in  MPTR 


FN  MPTR  6F000000@X  6F000000@X\ 


DUMP  OF  MASDIR 


FILELN 

MASASSO 

ATPL 

BUFFERPL 

COMTAB 

DFREADPL 

LPARPACK 

MLANGDIR 

MPROB 

MSYMTBL 

NAMEFLAG 

PAUSEPL 

PROBLEM 

PROBLIST 

QUE/LIST 

READPL 

SSG 

TK  6530 


00502500 

00517A70 

005091C0 

00514FD8 

00502B40 

00509FF0 

00516F88 

00501E98 

005013B8 

00502FD0 

00509138 

0050AFE0 

00509170 

00516D20 

005091Q0 

00591E8 

0051B020 


master  directory  pointer 
used  for  dump.  Note  use 
of  hexadecimal  constants. 


6F  is  hexadecimal  for  (?) 
The  two  question  marks 
say  dump  everything  in 
the  list. 

Whenever  the  address 
portion  is  null  (000000) 
the  contents  are  printed 
on  the  output  device. 


The  hexadecimal  constants  6F000000  are  equivalent  to 
a  question-mark  left- just if ied ,  padded  with  zeros.  When 
given  as  the  second  and  third  arguments  dump  the  whole 


master  list. 


lb 


example  4.  Uho  of  (vrmanont  and  Temporal  y  Storage 
under  Different  Problem  Names 


( INT) (MATRIX) (PR0B1  )\ 
TK  6530 


default  node  set  to  matrix;  de¬ 
fault  problem  set  to  PROB1 


PM  MATies#D- (2,2)\  temporary  2x2  matrix  created* 

zeroed,  and  used  in  call  to 
print  routine. 

If  the  dimension  were  not  specified 
MAT1  would  have  been  created  2te25 
zeroed  and  printed. 


MAT  1  2  ROMS 

2  COLUMNS 

Page  1 

COLUMN  1 

2 

ROM  1  0.0 

ROM  2  0.0 

TK  6530 

MAT18S  —  2.0  3.0  1.0  5.0; 

0  0 
0.0 

PM  MAT1#8\ 

MAT1  given  values 
and  printed. 

MAT  1  2  ROMS 

2  COLUMNS 

PAGE  1 

COLUMN  1 

2 

ROM  1  0.200000E  01  0.300000E  01 
ROM  2  0. 100000E  01  0.S00000B  01 

TK  6530 

MAT2  --  7.0  1.5  3.7  -8.2\  permanent  SMitrix  MAT2 

TK  6530  given  values 

TK  6530 

MAT2  (2,1)  --  6.0  ;  PM  MAT2\  an  individual  element  of 

MAT2  given  a  value.  MAT2 
is  printed.  Matrices  are 
stored  by  rows.  Dimension 
information  for  MAT2  had 
been  previously  specified. 


MAT2  2  ROMS 


2  COLUMNS  PAGE  1 


COLUMN 


2 


ROM  1  0. 700000E  01  0.150000B  01 

ROM  2  0.600000E  01  -0.820000B  01 

TK  6530 


HA  HAT  1*6  HAT 2  HAT)#P»P*Ott2t 


TIC  fc*|0 

PH  MATJ#P*PPOB2» 


HAT)  2  POMS 

COLUMN  ) 

POM  1  0.900000r 
POM  2  0. 7000001 

TP  65)0 
( 1MT) CPMOA 
TP  ttlO 


%HTS\ 

tp  im  0 


MAT)  and  HAT 2  arc  added 
and  l lie  result  stored  in 
HAT  I,  a  |*er*ancMt  variable 
tn  PPOB2. 

HAT)  i«  printed  out. 


2  PACE  1 

2 

ni  0.4  jOOOOI  01 

01  -O. 1200001  01 


END  statement  -  all  tempor¬ 
ary  variables  destroyed, 
and  all  defaults  cleared. 
Control  is  returned  to  MTS. 
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